home *** CD-ROM | disk | FTP | other *** search
/ POINT Software Programming / PPROG1.ISO / pascal / swag / misc.swg / 0018_Compiler Directives.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1993-05-10  |  3.8 KB  |  89 lines
  1. So I'm using a common include file, which I'll add to the end of this message,
  2. and I've noticed something very strange.  I used the Object browser to find
  3. all the units, and I have triple checked to ensure they all include the
  4. include file and this is what I've found:
  5.  
  6. With DEBUGGING set my file compiles to 115K
  7. Without DEBUGGING set 81K
  8.  
  9. When I look at the file there is still loads of symbol information there.
  10. After TDStrip of the above file, it's down to 55K (81-55=26).  That's a 26K
  11. difference.  Where is it coming from?  Sure I'm using CRT and DOS, and
  12. obviously the include file doesn't work for them, but after looking at the
  13. remaining symbol information, it's alot of stuff from my various units
  14. aswell as CRT and DOS.
  15.  
  16. What's the deal with the symbols coming from my units when I tell them
  17. not to?  I say symbols as it's all declarations from my interface
  18. sections like variables and procedure names, etc.
  19.  
  20. Anyways, I wasn't interested in using multiple configuration files, but
  21. I guess I'll have to as I forgot about Borland units, and I guess everyone
  22. else did aswell.
  23.  
  24. ----------------------------- OPTIONS.INC --------------------------------
  25. {
  26. Turbo Pascal Compiler Directives
  27. }
  28.  
  29. {$DEFINE i286}
  30. {$DEFINE DEBUGGING}
  31.  
  32. {$A+}                   { Data Alignment........Word                  }
  33. {$I-}                   { I/O Checking..........Off                   }
  34. {$X-}                   { Enhanced Syntax.......Off                   }
  35. {$V-}                   { String Type Checking..Relaxed               }
  36. {$P-}                   { Open Strings..........Off                   }
  37. {$T-}                   { @ Pointers............UnTyped               }
  38.  
  39. {$IFDEF i286}
  40. {$G+}                   { 286 OpCodes...........On                    }
  41. {$ELSE}
  42. {$G-}                   { 286 OpCodes...........Off                   }
  43. {$ENDIF}
  44.  
  45. {$IFDEF OVERLAYS}
  46. {$F+}                   { Far Calls.............On                    }
  47. {$O+}                   { Overlays Allowed......Yes                   }
  48. {$ELSE}
  49. {$F-}                   { Far Calls.............Off                   }
  50. {$O-}                   { Overlays Allowed......No                    }
  51. {$ENDIF}
  52.  
  53. {$IFDEF DEBUGGING}
  54. {$B+}                   { Boolean Evaluation....Complete              }
  55. {$D+}                   { Debugging Info........On                    }
  56. {$L+}                   { Line Numbers..........On                    }
  57. {$Y+}                   { Symbol Information....On                    }
  58. {$R+}                   { Range Checking........On                    }
  59. {$S+}                   { Stack Checking........On                    }
  60. {$Q+}                   { Overflow Checking.....On                    }
  61. {$ELSE}
  62. {$B-}                   { Boolean Evaluation....Short Circuit         }
  63. {$D-}                   { Debugging Info........Off                   }
  64. {$L-}                   { Line Numbers..........Off                   }
  65. {$Y-}                   { Symbol Information....Off                   }
  66. {$R-}                   { Range Checking........Off                   }
  67. {$S-}                   { Stack Checking........Off                   }
  68. {$Q-}                   { Overflow Checking.....On                    }
  69. {$ENDIF}
  70.  
  71. {
  72. Program Memory Requirements
  73. }
  74. {$M 32000,0,0}          { Stack Size............32000   Heap.....0     }
  75.  
  76. .----------------------------------------------------.
  77. | Colin Buckley                                      |
  78. | Toronto, Ontario, Canada                           |
  79. | InterNet: colin.buckley@rose.com                   |
  80. |                                                    |
  81. | So Eager to Play, So Relunctant to Admit it...     |
  82. `----------------------------------------------------'
  83.  
  84. ---
  85.  ■ RoseReader 2.10ß P003288 Entered at [ROSE]
  86.  * Rose Media, Toronto, Canada : 416-733-2285
  87.  * PostLink(tm) v1.04  ROSE (#1047) : RelayNet(tm)
  88.  
  89.